home *** CD-ROM | disk | FTP | other *** search
/ EuroCD 3 / EuroCD 3.iso / Programming / vbcc / machines / amiga68k / libsrc / stdio / _putbuf.c < prev    next >
Encoding:
C/C++ Source or Header  |  1998-06-24  |  777 b   |  29 lines
  1. #include <stdlib.h>
  2. #include <stdio.h>
  3.  
  4. #include <proto/dos.h>
  5.  
  6. /*  schreibt Daten aus Buffer   */
  7. /*  fuegt c als neues Zeichen ein, falls c!=EOF */
  8. int _putbuf(int c,FILE *f)
  9. {
  10.     _chkabort();
  11.     if(!f) return(EOF);
  12.     if((f->flags&(_WRITEABLE|_READ|_EOF|_ERR))!=_WRITEABLE) return(EOF);
  13.     if(!f->bufsize){if(f->flags&_UNBUF) f->bufsize=1; else f->bufsize=BUFSIZ;}
  14.     if(!f->base){
  15.         if(!(f->base=(char *)malloc(f->bufsize+1)+1))
  16.             return(EOF);
  17.     }else{
  18.         int len=f->pointer-f->base;
  19.         if(f->flags&_WRITE)
  20.          if(Write((BPTR)f->filehandle,f->base,len)!=len) return(EOF);
  21.     }
  22.     f->flags|=_WRITE;
  23.     f->pointer=f->base;
  24.     f->count=f->bufsize;
  25.     *f->pointer++=c;
  26.     f->count--;
  27.     return(0);  /*  hier noch ueberlegen    */
  28. }
  29.